﻿Namespace model
    Public Class xm_cbot_mes
        Private _id_prod As String
        Private _id_cbot As String
        Private _nomenclatura As String
        Private _anno As Integer
        Private _mes As Integer
        Private _text1_cbot As String
        Private _text2_cbot As String
        Private _estado As String
        Public Overrides Function toString() As String
            Return Text1_cbot.Trim + " " + Id_cbot.Trim
        End Function
        Public Property Anno() As Integer
            Get
                Return _anno
            End Get
            Set(ByVal value As Integer)
                _anno = value
            End Set
        End Property
        Public Property Estado() As String
            Get
                Return _estado
            End Get
            Set(ByVal value As String)
                _estado = value
            End Set
        End Property
        Public Property Id_cbot() As String
            Get
                Return _id_cbot
            End Get
            Set(ByVal value As String)
                _id_cbot = value
            End Set
        End Property
        Public Property Id_prod() As String
            Get
                Return _id_prod
            End Get
            Set(ByVal value As String)
                _id_prod = value
            End Set
        End Property
        Public Property Mes() As Integer
            Get
                Return _mes
            End Get
            Set(ByVal value As Integer)
                _mes = value
            End Set
        End Property
        Public Property Nomenclatura() As String
            Get
                Return _nomenclatura
            End Get
            Set(ByVal value As String)
                _nomenclatura = value
            End Set
        End Property
        Public Property Text1_cbot() As String
            Get
                Return _text1_cbot
            End Get
            Set(ByVal value As String)
                _text1_cbot = value
            End Set
        End Property
        Public Property Text2_cbot() As String
            Get
                Return _text2_cbot
            End Get
            Set(ByVal value As String)
                _text2_cbot = value
            End Set
        End Property

    End Class
End Namespace


